%# BEGIN BPS TAGGED BLOCK {{{
%# 
%# COPYRIGHT:
%#  
%# This software is Copyright (c) 1996-2004 Best Practical Solutions, LLC 
%#                                          <jesse@bestpractical.com>
%# 
%# (Except where explicitly superseded by other copyright notices)
%# 
%# 
%# LICENSE:
%# 
%# This work is made available to you under the terms of Version 2 of
%# the GNU General Public License. A copy of that license should have
%# been provided with this software, but in any event can be snarfed
%# from www.gnu.org.
%# 
%# This work is distributed in the hope that it will be useful, but
%# WITHOUT ANY WARRANTY; without even the implied warranty of
%# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
%# General Public License for more details.
%# 
%# You should have received a copy of the GNU General Public License
%# along with this program; if not, write to the Free Software
%# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
%# 
%# 
%# CONTRIBUTION SUBMISSION POLICY:
%# 
%# (The following paragraph is not intended to limit the rights granted
%# to you to modify and distribute this software under the terms of
%# the GNU General Public License and is only of importance to you if
%# you choose to contribute your changes and enhancements to the
%# community by submitting them to Best Practical Solutions, LLC.)
%# 
%# By intentionally submitting any modifications, corrections or
%# derivatives to this work, or any other work intended for use with
%# Request Tracker, to Best Practical Solutions, LLC, you confirm that
%# you are the copyright holder for those contributions and you grant
%# Best Practical Solutions,  LLC a nonexclusive, worldwide, irrevocable,
%# royalty-free, perpetual, license to use, copy, create derivative
%# works based on those contributions, and sublicense and distribute
%# those contributions and any derivatives thereof.
%# 
%# END BPS TAGGED BLOCK }}}
<& /Elements/Header, Title => loc("Create a new asset") &>
<& /AssetTracker/Elements/Tabs, 
    current_toptab => "AssetTracker/Asset/Create.html", 
    Title => loc("Create a new asset") &>
<form action="<%RT->Config->Get('WebPath')%>/AssetTracker/Asset/Create.html" method="post" enctype="multipart/form-data" name="AssetCreate">
<input type="hidden" Name="id" value="new" />
<div id="Asset-Create-basics">
<a name="basics"></a>	
<&| /Widgets/TitleBox, title => loc("Create a new asset") &>
<table border="0" cellpadding="0" cellspacing="0">
<tr><td class="label"><&|/l&>Type</&>:</td>
<td class="value"><% $TypeObj->Name %>
<input type="hidden" name="Type" Value="<%$TypeObj->Name%>" />
</td>
<tr>
<td class="labeltop">
<&|/l&>Name</&>:
</td>
<td class="value" colspan="5">
<input name="Name" size="40" maxlength="200" VALUE="<% $ARGS{Name} %>" />
</td>
</tr>
<tr>
<td class="label"><&|/l&>Status</&>:
</td>
<td class="value">
<& /AssetTracker/Elements/SelectStatus, Name => "Status", Default => $ARGS{Status}||'new', DefaultValue => 0 &>
</td>
</tr>
<tr>
<td class="label">
<&|/l&>Owner</&>:
</td>
<td class="value">
<& /Elements/SelectOwner, Name => "Owner", TypeObj => $TypeObj, Default => $ARGS{Owner}||$RT::Nobody->Id, DefaultValue => 0 &>
</td>
</tr>
</tr>
<tr>
<td class="labeltop">
<&|/l&>Administrators</&>:
</td>
<td class="value" colspan="5">
<input name="Admin" size="40" VALUE="<% $ARGS{Admin} %>"/><BR>
<i><font size="-2">
<&|/l&>(Administrators)</&></font></i>
</td>
</tr>
<tr>
<td class="label">
<&|/l&>Description</&>:
</td>
<td class="value" colspan="5">
<input Name="Description" size="100" maxlength="255" value="<%$ARGS{Description} || ''%>" />
</td>
</tr>
<tr>
<td colspan="6">
<& /AssetTracker/Asset/Elements/EditCustomFields, TypeObj => $TypeObj &>
</td>
</tr>
<tr>
<td align="right" colspan="2">
</td>
</tr>
</table>
</&>
<& /Elements/Submit, Label => loc("Create")&>
</div>

<br>
<table width="100%" border="0">
<tr>
<td width="50%" valign="top">

<br>

<br>
</td>

<td valign="top">
<br>

</td>
</tr>
</table>
</form>

<%INIT>



my $TypeObj = new RTx::AssetTracker::Type($session{'CurrentUser'});
$TypeObj->Load($Type) || Abort(loc("Type could not be loaded."));
my $CFs = $TypeObj->AssetCustomFields();

if ($ARGS{'id'} eq 'new') { # new asset?
    $m->comp('Display.html', %ARGS);
    return();
}
</%INIT>

<%ARGS>
$Type => undef
</%ARGS>
